home *** CD-ROM | disk | FTP | other *** search
- global BlinkObjekt, Beskriv
-
- on new me
- set BlinkObjekt to new(script "Blink")
- end
-
- on enterFrame
- checkBlink(BlinkObjekt)
- end
-
- on exitFrame
- go(#loop)
- end
-
- on keyDown
- if the key = RETURN then
- set Beskriv to the text of member "Beskrivelse"
- go(#next)
- end if
- end
-